← Index
NYTProf Performance Profile   
For ../prof.pl
  Run on Thu Dec 15 15:23:56 2022
Reported on Thu Dec 15 15:27:04 2022

Filename(eval 357)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
StatementsExecuted 18 statements in 151µs
Eval Invoked At/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112
Subroutines
Calls P F Exclusive
Time
Inclusive
Time
Subroutine
81164µs155µsJSON::Schema::Modern::::_get_vocabulary_class JSON::Schema::Modern::_get_vocabulary_class
11111µs26µsJSON::Schema::Modern::::BEGIN@5.207 JSON::Schema::Modern::BEGIN@5.207
1113µs3µsMethod::Generate::Accessor::_Generated::::BEGIN@10.208Method::Generate::Accessor::_Generated::BEGIN@10.208
Call graph for these subroutines as a Graphviz dot language file.
Line State
ments
Time
on line
Calls Time
in subs
Code
1{
221µs my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
310s my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4 package JSON::Schema::Modern;
5246µs241µs
# spent 26µs (11+15) within JSON::Schema::Modern::BEGIN@5.207 which was called: # once (11µs+15µs) by Sub::Quote::_clean_eval at line 5
no warnings 'closure';
# spent 26µs making 1 call to JSON::Schema::Modern::BEGIN@5.207 # spent 15µs making 1 call to warnings::unimport
6
# spent 155µs (64+91) within JSON::Schema::Modern::_get_vocabulary_class which was called 8 times, avg 19µs/call: # 8 times (64µs+91µs) by JSON::Schema::Modern::Vocabulary::Core::__fetch_vocabulary_data at line 322 of /Users/ether/git/JSON-Schema-Modern/lib/JSON/Schema/Modern/Vocabulary/Core.pm, avg 19µs/call
sub _get_vocabulary_class {
7 ($_QUOTED,$_UNQUOTED) if 0;
8# BEGIN quote_sub PRELUDE
9package Method::Generate::Accessor::_Generated;
10
# spent 3µs within Method::Generate::Accessor::_Generated::BEGIN@10.208 which was called: # once (3µs+0s) by Sub::Quote::_clean_eval at line 15
BEGIN {
1110s $^H = 2018;
1211µs ${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
1313µs %^H = (
14 );
15137µs13µs}
16# END quote_sub PRELUDE
17858µs2491µsshift->_assert__vocabulary_classes->${\Data::Perl::Collection::Hash::MooseLike->can("get")}(@_); }
# spent 53µs making 8 calls to Data::Perl::Collection::Hash::MooseLike::get, avg 7µs/call # spent 37µs making 8 calls to JSON::Schema::Modern::_assert__vocabulary_classes, avg 5µs/call # spent 1µs making 8 calls to UNIVERSAL::can, avg 125ns/call
1811µs $$_UNQUOTED = \&_get_vocabulary_class;
19}
2014µs1;
21
22;